package cn.szzsi.common.util;

/**
 * Created by weimin28 on 2016/11/25.
 */

import com.google.zxing.*;
import com.google.zxing.common.BitMatrix;
import com.google.zxing.common.HybridBinarizer;
import com.google.zxing.qrcode.decoder.ErrorCorrectionLevel;
import com.jfinal.core.JFinal;
import com.jfinal.kit.StrKit;
//import com.sun.image.codec.jpeg.JPEGCodec;
//import com.sun.image.codec.jpeg.JPEGEncodeParam;
//import com.sun.image.codec.jpeg.JPEGImageEncoder;

import javax.imageio.IIOImage;
import javax.imageio.ImageIO;
import javax.imageio.ImageWriteParam;
import javax.imageio.ImageWriter;
import javax.imageio.stream.FileImageOutputStream;

import org.apache.commons.io.IOUtils;

import java.awt.*;
import java.awt.geom.RoundRectangle2D;
import java.awt.image.BufferedImage;
import java.io.*;
import java.net.URL;
import java.util.Hashtable;
import java.util.Random;

/**
 * 二维码工具类
 *
 */
public class QRCodeUtil {

    private static final String CHARSET = "utf-8";
    private static final String FORMAT_NAME = "JPG";
    // 二维码尺寸
    private static final int QRCODE_SIZE = 430;
    // LOGO宽度
    private static final int WIDTH = 75;
    // LOGO高度
    private static final int HEIGHT = 75;

    private static BufferedImage createImage(String content, String imgPath,
                                             boolean needCompress) throws Exception {
        Hashtable<EncodeHintType, Object> hints = new Hashtable<EncodeHintType, Object>();
        hints.put(EncodeHintType.ERROR_CORRECTION, ErrorCorrectionLevel.H);
        hints.put(EncodeHintType.CHARACTER_SET, CHARSET);
        hints.put(EncodeHintType.MARGIN, 1);
        BitMatrix bitMatrix = new MultiFormatWriter().encode(content,
                BarcodeFormat.QR_CODE, QRCODE_SIZE, QRCODE_SIZE, hints);
        int width = bitMatrix.getWidth();
        int height = bitMatrix.getHeight();
        BufferedImage image = new BufferedImage(width, height,
                BufferedImage.TYPE_INT_RGB);
        for (int x = 0; x < width; x++) {
            for (int y = 0; y < height; y++) {
                image.setRGB(x, y, bitMatrix.get(x, y) ? 0xFF000000
                        : 0xFFFFFFFF);
            }
        }
        if (imgPath == null || "".equals(imgPath)) {
            return image;
        }
        // 插入图片
        QRCodeUtil.insertImage(image, imgPath, needCompress);
        return image;
    }

    /**
     * 插入LOGO
     *
     * @param source
     *            二维码图片
     * @param imgPath
     *            LOGO图片地址
     * @param needCompress
     *            是否压缩
     * @throws Exception
     */
    private static void insertImage(BufferedImage source, String imgPath,
                                    boolean needCompress) throws Exception {
        File file = new File(imgPath);
        if (!file.exists()) {
            System.err.println(""+imgPath+"   该文件不存在！");
            return;
        }
        Image src = ImageIO.read(new File(imgPath));
        int width = src.getWidth(null);
        int height = src.getHeight(null);
        if (needCompress) { // 压缩LOGO
            if (width > WIDTH) {
                width = WIDTH;
            }
            if (height > HEIGHT) {
                height = HEIGHT;
            }
            Image image = src.getScaledInstance(width, height,
                    Image.SCALE_SMOOTH);
            BufferedImage tag = new BufferedImage(width, height,
                    BufferedImage.TYPE_INT_RGB);
            Graphics g = tag.getGraphics();
            g.drawImage(image, 0, 0, null); // 绘制缩小后的图
            g.dispose();
            src = image;
        }


//        BufferedImage result = null;
//        BufferedImage im = ImageIO.read(new File(imgPath));
//
//            /* 原始图像的宽度和高度 */
//        int width = im.getWidth();
//        int height = im.getHeight();
//
//        //压缩计算
//        float resizeTimes = 0.1f;  /*这个参数是要转化成的倍数,如果是1就是转化成1倍*/
//
//            /* 调整后的图片的宽度和高度 */
//        int toWidth = (int) (width * resizeTimes);
//        int toHeight = (int) (height * resizeTimes);
//
//            /* 新生成结果图片 */
//        result = new BufferedImage(toWidth, toHeight,
//                BufferedImage.TYPE_INT_RGB);
//
//        result.getGraphics().drawImage(
//                im.getScaledInstance(toWidth, toHeight,
//                        java.awt.Image.SCALE_SMOOTH), 0, 0, null);
//        ImageIO.write(result, FORMAT_NAME, new File("/Users/weimin28/Desktop/a.jpg"));


        // 插入LOGO
        Graphics2D graph = source.createGraphics();
        int x = (QRCODE_SIZE - width) / 2;
        int y = (QRCODE_SIZE - height) / 2;
        graph.drawImage(src, x, y, width, height, null);
        Shape shape = new RoundRectangle2D.Float(x, y, width, width, 6, 6);
        graph.setStroke(new BasicStroke(3f));
        graph.draw(shape);
        graph.dispose();
    }



    /**
     * 保存图片到本地
     * @param picUrl
     *      图片URL地址
     * @param newFileName
     *      保存文件名
     * @param dir
     *      保存目录
     * @return
     */
    public static String savePic(String picUrl, String newFileName, String dir){
        try{
            URL url = new URL(picUrl);
            InputStream in = url.openStream();
            BufferedImage srcImage =  ImageIO.read(url.openStream());

            if(StrKit.isBlank(dir))
                dir = JFinal.me().getServletContext().getRealPath("/upload/qrcode/");
            mkdirs(dir);
            File img = new File(dir + "/" + newFileName);

            ImageIO.write(srcImage, "jpg", img);
            in.close();
            return dir + "/" + newFileName;
        } catch (IOException e) {
            e.printStackTrace();
        }
        return null;
    }

    /**
     * 生成二维码(内嵌LOGO)
     *
     * @param content
     *            内容
     * @param imgPath
     *            LOGO地址
     * @param destPath
     *            存放目录
     * @param needCompress
     *            是否压缩LOGO
     * @throws Exception
     */
    public static void encode(String content, String imgPath, String destPath,
                              boolean needCompress) throws Exception {
        BufferedImage image = QRCodeUtil.createImage(content, imgPath,
                needCompress);
        mkdirs(destPath);
        String file = new Random().nextInt(99999999)+".jpg";
        ImageIO.write(image, FORMAT_NAME, new File(destPath+"/"+file));
    }

    /**
     * 当文件夹不存在时，mkdirs会自动创建多层目录，区别于mkdir．(mkdir如果父目录不存在则会抛出异常)
     * @author lanyuan
     * Email: mmm333zzz520@163.com
     * @date 2013-12-11 上午10:16:36
     * @param destPath 存放目录
     */
    public static void mkdirs(String destPath) {
        File file =new File(destPath);
        //当文件夹不存在时，mkdirs会自动创建多层目录，区别于mkdir．(mkdir如果父目录不存在则会抛出异常)
        if (!file.exists() && !file.isDirectory()) {
            file.mkdirs();
        }
    }

    /**
     * 生成二维码(内嵌LOGO)
     *
     * @param content
     *            内容
     * @param imgPath
     *            LOGO地址
     * @param destPath
     *            存储地址
     * @throws Exception
     */
    public static void encode(String content, String imgPath, String destPath)
            throws Exception {
        QRCodeUtil.encode(content, imgPath, destPath, false);
    }

    /**
     * 生成二维码
     *
     * @param content
     *            内容
     * @param destPath
     *            存储地址
     * @param needCompress
     *            是否压缩LOGO
     * @throws Exception
     */
    public static void encode(String content, String destPath,
                              boolean needCompress) throws Exception {
        QRCodeUtil.encode(content, null, destPath, needCompress);
    }

    /**
     * 生成二维码
     *
     * @param content
     *            内容
     * @param destPath
     *            存储地址
     * @throws Exception
     */
    public static void encode(String content, String destPath) throws Exception {
        QRCodeUtil.encode(content, null, destPath, false);
    }

    /**
     * 生成二维码(内嵌LOGO)
     *
     * @param content
     *            内容
     * @param imgPath
     *            LOGO地址
     * @param output
     *            输出流
     * @param needCompress
     *            是否压缩LOGO
     * @throws Exception
     */
    public static void encode(String content, String imgPath,
                              OutputStream output, boolean needCompress) throws Exception {
        BufferedImage image = QRCodeUtil.createImage(content, imgPath,
                needCompress);
        ImageIO.write(image, FORMAT_NAME, output);
    }

    /**
     * 生成二维码
     *
     * @param content
     *            内容
     * @param output
     *            输出流
     * @throws Exception
     */
    public static void encode(String content, OutputStream output)
            throws Exception {
        QRCodeUtil.encode(content, null, output, false);
    }

    /**
     * 解析二维码
     *
     * @param file
     *            二维码图片
     * @return
     * @throws Exception
     */
    public static String decode(File file) throws Exception {
        BufferedImage image;
        image = ImageIO.read(file);
        if (image == null) {
            return null;
        }
        BufferedImageLuminanceSource source = new BufferedImageLuminanceSource(
                image);
        BinaryBitmap bitmap = new BinaryBitmap(new HybridBinarizer(source));
        Result result;
        Hashtable<DecodeHintType, Object> hints = new Hashtable<DecodeHintType, Object>();
        hints.put(DecodeHintType.CHARACTER_SET, CHARSET);
        result = new MultiFormatReader().decode(bitmap, hints);
        String resultStr = result.getText();
        return resultStr;
    }

    /**
     * 解析二维码
     *
     * @param path
     *            二维码图片地址
     * @return
     * @throws Exception
     */
    public static String decode(String path) throws Exception {
        return QRCodeUtil.decode(new File(path));
    }
    
    public static boolean writeHighQuality(BufferedImage im, String fileFullPath) {
		ImageWriter imageWriter = null;
		FileImageOutputStream  newImage = null;
		try {
			imageWriter = ImageIO.getImageWritersBySuffix("jpg").next();
			
			newImage = new FileImageOutputStream (new File(fileFullPath));
			imageWriter.setOutput(newImage);
			
			ImageWriteParam param = imageWriter.getDefaultWriteParam();
			param.setCompressionMode(ImageWriteParam.MODE_EXPLICIT); 
			param.setCompressionQuality(0.9f);
			
			imageWriter.write(null, new IIOImage(im, null, null), param);
			return true;
		} catch (Exception e) {
			return false;
		} finally {
			IOUtils.closeQuietly(newImage);
			if (imageWriter != null){
				imageWriter.dispose();
			}
		}
	}

    public static String makeLogoImage(String sourceImgPath, String imgPath, String dir, boolean needCompress) throws Exception {

        BufferedImage bi = ImageIO.read(new File(sourceImgPath));
//        bi.setRGB(0,0,BufferedImage.TYPE_INT_RGB);
//        BufferedImage image = new BufferedImage(width, height,
//                BufferedImage.TYPE_INT_RGB);
//
//        int width = bi.getWidth();
//        int height = bi.getHeight();
//        for (int x = 0; x < width; x++) {
//            for (int y = 0; y < height; y++) {
//                bi.setRGB(x, y, 0xFF000000);
//            }
//        }

        insertImage(bi,imgPath,needCompress);

        if(dir == null)
            dir = JFinal.me().getServletContext().getRealPath("/upload/qrcode/");
        mkdirs(dir);
        String file = new Random().nextInt(99999999)+".png";
        ImageIO.write(bi, FORMAT_NAME, new File(dir+"/"+file));
//        writeHighQuality(bi,dir+file);

        return "/upload/qrcode/"+file;
    }

    private static void makeLogoImage(String sourceImgPath, String imgPath, boolean needCompress) throws Exception {

        makeLogoImage(sourceImgPath,imgPath,null,needCompress);

    }

    public static void main(String[] args) throws Exception {
        String text = "薯　灯可分列式本上楞珂要瓜熟蒂落！000000000000000";
        QRCodeUtil.encode(text, "/Users/weimin28/Desktop/a.gif", "/Users/weimin28/Desktop/", true);
//        QRCodeUtil.savePic("https://www.baidu.com/img/baidu_jgylogo3.gif","a.gif","/Users/weimin28/Desktop/");
//        QRCodeUtil.makeLogoImage("/Users/weimin28/Desktop/12.jpg","/Users/weimin28/Desktop/a.gif","/Users/weimin28/Desktop/",true);
    }
}

